minEstSize <- 30
library(car)
